## Not run: ------------------------------------
# fit <- stan_demo("eight_schools")
#
# stan_diag(fit, info = 'sample') # shows three plots together
# samp_info <- stan_diag(fit, info = 'sample') # saves the three plots in a list
# samp_info[[3]] # access just the third plot
#
# stan_diag(fit, info = 'sample', chain = 1) # overlay chain 1
#
# stan_par(fit, par = "mu")
## ---------------------------------------------
Run the code above in your browser using DataLab